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PREFACE 

This  document  is  one  of  eight  reports  which  describe  the  work 
performed  by  Vector  Research,  Incorporated  (VRI)  and  its  subcontractor, 
Perceptronics,  Incorporated,  for  the  US  Army  Research  Institute  for  the 
Behavioral  and  Social  Sciences  (ARI)  under  the  second  phase  of  contract 
number  DAHC19-78-C-0027.  The  work  described  was  performed  over  12  months 
of  an  anticipated  36-month  three-phased  project.  The  overall  objective 
of  the  project  has  been  to  produce  procedural  guidelines  to  be  used  by 
divisions  in  the  field  in  developing  standard  operating  procedures  for 
information  management  in  the  Tactical  Operations  System  (TOS).  As  a 
consequence  of  the  redirection  of  the  TOS  development  effort  in  November 
1979,  the  objective  of  this  work  was  reinterpreted  to  include  automated 
battlefield  command  control  systems  (ABCCS)  in  general,  using  TOS  for  an 
explicit  example  of  the  design,  human  factors,  and  management  control 
considerations  which  must  be  addressed. 

The  VRI  study  team  for  phase  II  was  comprised  of  Dr.  Robert  W.  Blum 
(Project  Leader),  Ms.  Cathleen  A.  Callahan,  Dr.  W.  Peter  Cherry,  Mr.  Mark 
G.  Graulich,  Mr.  Donald  Klelst,  Mr.  Mark  Meerschaert,  Mr.  Gregory  Touma, 
and  Mr.  Gary  Witus.  The  Perceptronics  team  for  phase  II  consisted  of  Dr. 
/Ilchael  G.  Samet  and  Dr.  Ralph  E.  Geiselman. 

The  authors  wish  to  acknowledge  the  helpful  contributions  of  Dr. 
Stanley  M.  Halpin  and  Mr.  Robert  Andrews,  who  were  charged  with 
monitoring  the  study  for  ARI;  and  LTC  L.  Walker,  MAO.  A.  Edmonds,  and  Mr. 
M.  Carrlo,  who  performed  a  similar  function  for  that  portion  of  the  study 
effort  which  was  jointly  sponsored  with  ARI  by  the  US  Army  Communications 
Research  and  Development  Command  (CORADCOM). 
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The  eight  reports  are  as  follows: 

Slum  et  al.  Information  Management  for  an  Automated  Battlefield 
Command  and  Control  System:  Executive  Sumary.  ARI  Research 
Report  1249.  —  presents  an  overview  of  the  project  and  the 

other  seven  reports. 

Callahan  et  al.  Guidelines  for  Managing  the  Flow  of  Information 
in  an  Automated  Battlefield  Command  and  Control  System.  ARI 
Research  Report  1348.  —  describes  considerations  in  and 

procedures  for  the  management  of  contemporary  ABCC  systems. 

Geiselman  and  Samet.  Guideline  Development  for  Summarization  of 
Tactical  Data.  ARI  Technical  Report  458.  —  an  analysis  of 
procedures  for  the  extraction,  summarization,  and  presentation 
of  critical  information. 

Witus  et  al.  Analysis  of  Information  Flow  In  the  Tactical 
Operations  System  (TOS).  ARI  Research  Notes  80-12.  ~ 
describes  the  purpose,  approach,  and  results  of  a  TOS  analysis 
which  focused  on  TOS  when  integrated  with  a  planned 
communications  support  system. 

Witus  et  al.  Description  of  the  Tactical  Operations  System 
Information  Flow  Model.  ARI  Research  Notes  80-13.  — 

describes  the  representation  of  YOJTused  to  develop  the  analysis 
package  and  the  mathematics  of  the  model. 

Witus  et  al.  User's  Manual  for  the  Tactical  Operations  System 
Analysis  Package.  ARI  Research  Notes  80-14.  —  explains  the 

use  and  operation  of  the  analysis  package. 

Witus  et  al.  Programmer's  Manual  for  the  Tactical  Operations 
System  Analysis  Package.  ARI  Research  Notes  80-15.  — 
describes  the  programming  details  of  the  package  to  facilitate 
modifications  or  transfer  between  host  systems. 

Cherry,  W.  All  Source  Analysis  System:  Design  Issues.  ARI 
Working  Paper  HF80-XX.  —  a  discussion  of  design  issues 
associated  with  the  emerging  ASAS  concept. 
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I  1.0  INTRODUCTION 

f 

■The  purpose  of  this  volume  is  to  document  the  computer  programs  and 
data  structures  in  the  TOS  analysis  package  in  sufficient  detail  to 
enable  a  programmer  to  modify  the  package  or  transfer  it  between  computer 
systems.  The  volume  is  organized  into  five  chapters  and  three  appen¬ 
dices.  The  remainder  of  this  chapter  discusses  the  overall  organization 
of  the  analysis  package.  Chapters  2.0  through  5.0  discuss,  in  turn,  each 
of  the  four  computer  programs  in  the  package  and  present  flowcharts, 
descriptions  of  the  variables  and  subroutines,  and  discussions  of  the 
code.  Appendix  A  contains  a  listing  of  the  four  programs.  Appendix  B 
contains  a  variable  name  cross-reference  dictionary.  Appendix  C  contains 
a  statement  label  dictionary.  All  programs  are  written  in  standard 
FORTRAN  IV  and  contain  internal  commentary.  They  are  currently 
implemented  on  the  Amdahl  470/V7  computer  at  The  University  of  Michigan. 

The  analysis  package  performs  three  basic  functions:  (1)  interact¬ 
ing  with  the  operator  to  set,  alter,  or  examine  the  values  of  the  inputs; 

(2)  performing  the  computations  specified  by  the  mathematics  of  the 
model;  and  (3)  displaying  the  outputs.  The  package  consists  of  four 
computer  programs  and  one  external  data  structure. Ipthe  organization  of 
the  package,  the  interactions  between  the  programs  and  the  data 
structure,  and  the  operator  activities  are  shown  in  exhibit  1-1.  Program 
CREATE  prompts  the  operator  to  specify  values  for  all  of  the  inputs  in 
the  data  file  and  uses  them  to  create  a  new  data  file.  Program  MODIFY 
reads  an  existing  data  file,  and  allows  the  user  to  select  data  elements 
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DATA 

STRUCTURE 


EXHIBIT  1-1:  ANALYSIS  PACKAGE  ORGANIZATION 


COMPUTER 

PROGRAMS 


OPERATOR 

ACTIVITY 


Set  input  values 


Select  input  variables 
to  examine  and  set  new 
values  for  them 


Receive  display  of 
input  file 


Set  values  for  2  inputs, 
select  output  format, 
receive  output 


for  display  or  modification.  The  program  then  creates  a  new  data  file. 
Program  DISPLAY  reads,  formats,  and  displays  an  existing  data  file. 
Program  COMPUTE  performs  all  of  the  computations  required  by  the  model, 
allows  the  operator  to  select  the  output  format,  and  displays  the 
outputs. 


2.0  PROGRAM  CREATE 


Program  CREATE  was  written  to  facilitate  construction  of  the  data 
file  which  contains  input  data  for  the  TOS  simulation.  Program  CREATE  is 
written  in  FORTRAN  IV  and  is  set  up  to  be  run  interactively  from  a  ter¬ 
minal.  The  programming  code  and  logic  are  straightforward  and  should 
facilitate  implementation  on  any  computer  the  potential  user  desires. 

The  remainder  of  this  section  discusses  the  variables  and  characteristics 
of  program  CREATE. 

2.1  VARIABLES  IN  PROGRAM  CREATE 

.  Exhibits  2-1  through  2-7  contain  all  of  the  variables  used  in  pro 
gram  CREATE,  indicate  the  type  of  variable  as  implemented  in  the  program, 
and  give  a  definition  of  the  meaning  of  each  variables.  The  contents  of 
these  exhibits  are: 


# 

Exhibit  2-1: 

Network  Configuration  Data 

• 

Exhibit  2-2: 

Communications  System  Data 

A 

Exhibit  2-3: 

Message  Types  Data 

• 

Exhibit  2-4: 

Route  Cross  Message  Data 

• 

Exhibit  2-5: 

Engineering  Data 

• 

Exhibit  2-6: 

Error  Rate  Data 

• 

Exhibit  2-7: 

Program  Execution  Controls 

The  variables  which  contain  information  about  the  TOS  system  have 
names  mnemonically  derived  so  that  understanding  of  the  meaning  of  the 
variables  is  facilitated.  The  exceptions  to  this  general  rule  are  the 
logic  variables  which  are  used  to  control  the  program  flow. 


EXHIBIT  2-1:  CONFIGURATION  VARIABLES  IN  CREATE 


Name 

Type 

Meaning 

NBDE 

1*4 

The  number  of  brigades 

BDNAME ( I ) 

R*8 

The  name  of  Brigade  I 

NBN(I) 

1*4 

Number  of  battalions  in  Brigade  I 

BD(  I) 

1*4 

Type  of  processor  at  Brigade  I:  *  1 
if  TCS,  =  2  if  TCT 

NLINC(I) 

R*8 

The  name  of  the  channel  connecting 
Brigade  I  with  the  FEP 

BNNAMEt I ,J) 

R*8 

The  name  of  Battalion  J  of  Brigade  I 

BN ( I  ,J  ) 

1*4 

The  type  of  processor  at  Battalion  1 
of  Brigade  I:  =  1  if  TCS,  =  2  of  TCT 

NL INK ( I  ,J) 

R*8 

The  name  of  the  channel  connecting 
Battalion  J  to  Brigade  I 

NOU 

1*4 

The  number  of  Other  TOS  Users  (All 
users  which  are  not  either  brigades 
or  their  subordinate  battalions 
are  considered  Other  TOS  users.) 

OUNAME ( I ) 

R*8 

The  name  of  Other  TOS  User  I 

OU(I) 

1*4 

Type  of  processor  at  Other  TOS  User 

I:  ■  1  If  TCS,  =  2  if  TCT 

NLINCK(I) 

R*8 

Name  of  the  channel  connecting  Other 
TOS  User  I  to  the  FEP 

NC 

1*4 

The  number  of  communication  channels 
In  the  TOS  network 

CNAM(I) 

R*8 

The  name  of  TOS  communication  channel 

—  Continued  — 


CNAM(I) 


EXHIBIT  2-1:  CONFIGURATION  VARIABLES  IN  CREATE 
(Continued) 


Name 


NR 


Meaning 


The  number  of  routes  in  the  TOS 
communication  network:  equals  the 
number  of  Other  TOS  users  plus  number 
of  brigades  plus  number  of 
battalions 


RP(I,1) 


1*4 


The  number  of  the  route.  Routes  are 
numbered  in  the  same  order  as  given 
for  the  route  name.  (The  following 
order  of  routes  is  followed 
throughout  the  TOS  analysis  package: 
routes  numbered  1  through  NOU  are  the 
Other  TOS  Users;  routes  NOU+1  to 
NOU+NBDE  are  Brigades  1  through  NBDE, 
next  come  the  battalions,  first  the 
battalions  of  Brigade  1  then  the 
battalions  of  2,  etc.) 


RNAM(I) 

R*8 

The  name  of  route  I. 

RP (1,2) 

1*4 

The  node  with  which  node  I 
communicates.  By  convention  this 
equals  0  (the  FEP)  for  Other  TOS 

Users  and  Brigades.  For  a  Battalion, 
it  equals  the  route  number  of  its 
parent  brigade 

NL 

1*4 

Number  of  links,  eauals  the  number  of 
routes 

LP(I,1) 

1*4 

Equal  to  RP(I,1),  the  number  of  the 
link 

LP{ 1 ,2) 

1*4 

Number  of  channel  connecting  node  I 
with  the  FEP,  if  I  is  a  brigade  or 
Other  TOS  User,  or  with  the  parent 
brigade  if  I  is  a  battalion 

LP( I ,3) 

1*4 

The  number  of  the  node  with  which 
node  I  communicates.  If  node  I 
communicates  with  the  FEP,  LP( 1 ,3 ) 
equals  NR  plus  1,  If  node  I  is  a 
battalion,  LP(I,3)  is  the  number  of 
its  parent  brigade 

—  Continued  — 
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EXHIBIT  2-1: 

CONFIGURATION  VARIABLES  IN  CREATE 
(Concluded) 

Name 

lm 

1*4 

Meaning 

LINC(I) 

The  number  of  the  channel  connecting 
Brigade  I  with  the  FEP 

LINK(I,J) 

1*4 

The  number  of  the  channel  connecting 
Battalion  J  with  Brigade  I 

LINCK(I) 

1*4 

The  number  of  the  channel  connecting 
Other  TOS  User  I  with  the  FEP 

IPD(I) 

1*4 

The  type  of  processor  at  node  I: 

=  1  if  TCS,  =  2  if  TCT 

NP 

1*4 

Number  of  processors:  equal  NR+1 

NN 

1*4 

Number  of  nodes:  equals  NP  +  NC  +  3 

EXHIBIT  2- 

Type 

R*4 

R*4 

R*4 


:  COMMUNICATIONS  SYSTEM  VARIABLES 
IN  CREATE 

_ Meaning _ 

Rise  time,  in  milliseconds,  of 
Channel  I 

Transmission  rate,  in  characters  per 
second,  of  Channel  I 


Proportion  of  time  Channel  I  is  being 
used  for  voice  communications 


R*4 


Number  of  lines  on  Channel  I 


EXHIBIT  2-3:  MESSAGE  VARIABLES  IN  CREATE 


Name 

Type 

Meani  ng 

NM 

1*4 

Total  number  of  message  types  In  the 
system 

NUM 

1*4 

Number  of  user-initiated  messages  in 
the  TOS  system  (By  implication,  the 
number  of  TOS-generated  messages  is 

NM  -  NUM) 

MNAM(I) 

R*8 

The  name  of  Message  Type  I.  (By 
convention  user-initiated  messages 
are  numbered  1  through  NUM  and 

TOS- initiated  messages  are  numbered 
NUM  +  1  through  NM) 

MD(I,1) 

R*4 

The  average  length  in  characters  of 
Message  Type  I 

IMP(I.l) 

R*8 

The  name  of  message  type  caused  as 
output  on  the  same  route  by  Message 
Type  I:  =  0,  if  none 

IMP { 1 ,2) 

R*8 

The  name  of  message  type  caused  as 
output  on  another  route  by  Message 
Type  I:  *  0,  if  none  or  if  Message  I 
is  a  TOS-generated  message 

MP(I,1) 

1*4 

The  number  of  Message  Type  IMP(I,1) 

MP( I ,2) 

1*4 

The  number  of  Message  Type  I MP (1,2) 

EXHIBIT  2-4:  ROUTE  CROSS  MESSAGE  ARRAY  VARIABLES  IN  CREATE 
(I  =  Route  Number,  J  =  Message  Number) 


Name  Type  _ Meaning 


(If  J  <  NUM, 

Message  J  Is 

a  user-initiated  message) 

RM(I.J.l) 

R*4 

Initiation  rate.  In  messages  per 
hour,  of  Message  J  at  Node  I 

RM(  I  ,J  ,2) 

R*4 

=  0,  not  used  for  user-initiated 
messages 

RM( I ,J ,3) 

R*4 

*  0  if  I  Is  not  a  battalion. 

Equals  the  probability  that  Message  J 
Is  deleted  during  hierarchical  review 
at  the  parent  brigade  if  I  is  a 
battalion 

RM( I ,J ,4) 

R*4 

=  0  If  I  is  not  a  battalion. 

Equals  the  probability  that  Message  J 
Is  altered,  but  not  deleted,  during 
hierarchical  review  at  the  parent 
brigade  If  I  Is  a  battalion 

•(If  J>NUM, 

Message  J  Is 

a  TOS-lnitlated  message) 

RM(I,J,1) 

R*4 

3  a  (I,J),  proportionality  constant 
used  to  determine  the  Initiation  rate 
of  TOS-lnitlated  Message  J  on  route  I 

RM(  I  ,J  ,2) 

R*4 

*  ft  (I,J),  proportionality  constant 
used  to  which  determine  the  initia¬ 
tion  rate  of  TOS-lnitlated  Message  J 
on  route  I 

RM(I,J,3) 

R*4 

*  0,  not  used  for  T0S- initiated 
messages 

RM(  I  ,J  ,4) 

R*4 

*  0,  not  used  for  TOS-lnitlated 
messages 

EXHIBIT  2-5:  ENGINEERING  DATA  IN  CREATE 


Name 

Type 

Meant  ng 

00(1 ) 

R*4 

Message  Disk  Mean  access  time  In 
mill  1  seconds 

00(2) 

R*4 

Data  Disk  Mean  access  time  In  milli¬ 
seconds 

GPD(l.l) 

R*4 

CPU,  In  milliseconds  per  message, 
required  to  originate  a  message,  at  a 
TCS 

GPD(1 ,2) 

R*4 

CPU,  In  milliseconds  per  message, 
required  to  originate  a  message  at  a 
TCS 

GP0(2,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  send  the 
message,  at  a  TCS 

GPD(2,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  send  the  message 
at  a  TCS 

GPD(3,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  receive  a 
message  at  a  TCS 

GPD(3 ,2) 

R*4 

CPU,  time  in  milliseconds  per 
message,  required  to  receive  a 
message,  at  a  TCS 

GP0(4,1) 

R*4 

CPU, 1 me  In  milliseconds  per  message, 
to  template  check  a  message,  at  a 

TCS 

GP0(4,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  template  a  check 
a  message,  at  a  TCS 

GP0(5,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  terminate  a 
message,  at  a  TCS 

GP0(5,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  terminate  a 
message,  at  a  TCS 

-  Continued 


EXHIBIT  2-5:  ENGINEERING  DATA  IN  CREATE 
(Continued) 


Name 

Type 

Meaning 

GPD{6 ,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  terminate  a 
message,  at  a  TCS 

GPD(6,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  terminate  a 
message,  at  a  TCS 

GPD (7,1) 

R*4 

CPU,  time  in  milliseconds  per 
message,  required  to  originate  a 
message,  at  a  TCS 

GPD(7 ,2) 

R*4 

CPU,  time  in  milliseconds  per 
message,  required  to  originate  a 
message,  at  a  TCS 

GP0(8,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  send  a  message, 
at  a  TCS 

GP0(8,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  send  a  message, 
at  a  TCS 

GPD(9,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  send  to  receive 
a  message,  per  message 

GPD (9,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  receive  a 
message,  at  a  TCS 

GPD(10,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  terminate  a 
message,  at  a  TCS 

GPD(10,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  terminate  a 
message,  at  a  TCS 

GPD(11,1) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  Initiate  a 
message,  at  a  TCS 

GPD (11 ,2) 

R*4 

CPU,  time  In  milliseconds  per 
message,  required  to  Initiate  a 
message  at  a  TCS 

Continued 


EXHIBIT  2-5:  ENGINEERING  DATA  IN  CREATE 
(Concluded) 


Name 

Type 

Meaning 

MD(  1 ,2) 

R*4 

Data  base  processing  time,  in 
milliseconds,  of  Message  Type  I 

MD( 1,3) 

R*4 

Number  of  message  disk  reads  or 
writes  for  Message  Type  I 

MD( 1,4) 

R*4 

Number  of  data  disks  reads  or  writes 
for  Message  Type  I 

PD(  I) 

1*4 

Number  of  templates  at  node  I 

MD (1,4) 

R*4 

Number  of  data  disks  reads  or  writes 
for  Message  Type  I 

PD  ( I ) 

1*4 

Number  If  templates  at  node  I: 

*  0  If  node  I  is  not  a  Brigade 

PD(NR+1) 

1*4 

Number  of  templates  at  the  FEP 

EXHIBIT  2-6:  ENVIRONMENTAL  VARIABLES  IN  CREATE 


Name 

Type 

Meaning 

LD (1,1) 

R*4 

The  bit  error  rate  for  a  message 

sent  from  Node  I  to  the  next  node. 

In  bits  In  error  per  1000  bits 

LD( I ,2) 

R*4 

The  bit  error  rate  for  a  message 

sent  to  Node  I,  In  bits  In  error 
per  1000  bits 
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EXHIBIT  2-7: 

LOGIC  VARIABLES  IN  CREATE 

Name 

_  Type 

Meani ng 

IV 

1*4 

*  1  if  user  desires  short  prompts 

ITCT 

1*4 

=  1  if  a  TCT  is  present  in  the  TOS 
system 

ITCT 

1*4 

*  2  if  a  TCT  is  present  in  the  TOS 
system 

1ST 

1*4 

A  temporary  variable  to  determine  if 
TCSs  and  TCTs  are  present 

TCS 

1*4 

Literally,  the  character  string  "TCS 

TCT 

1*4 

Literally,  the  character  string  "TCT' 

IFG 

1*4 

*  1  if  the  Route  cross  Message  array 
is  to  be  read  in  later 

IW 

1*4 

=  1  if  the  user  desires  to  call  the 
display  routine  to  print  the  data  on 
the  termi nal 

IWF 

1*4 

=  1  if  the  user  desires  to  create  an 
output  file 

(I,  II,  III,  IJ ,  II,  12,  J,  JI,  JJ,  JJJ,  JK,  JN,  JR,  K,  RNUM  are  all 
indices  used  in  the  CREATE  logic) 
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A  convention  for  numbering  the  users  of  the  TOS  system  is  followed 
throughout  all  four  of  the  computer  programs.  In  this  system,  the  first 
users  are  always  the  non-brigade  users  of  the  TOS  system.  Immediately 
following  these  are  all  of  the  brigade  users.  Following  the  brigades  are 
their  battalion  users:  all  the  battalions  of  the  first  brigade,  then  all 
the  battalions  of  the  second  brigade,  etc.  In  this  way,  the  type  of  TOS 
user  can  be  inferred  by  its  number  without  having  to  append  additional 
identifiers  to  the  number  or  names.  The  use  of  this  convention  will 
become  obvious  when  the  data  file  is  discussed. 

The  arrays  BDNAME,  BNNAME,  OUNAME,  CNAM,  RNAM,  and  MNAM  are  declared 
as  R*8  variables  in  program  CREATE.  They  are,  however,  used  as  names  in 
CREATE  and  may  contain  strings  of  up  to  eight  alpha-numeric  characters. 
They  are  included  as  a  convenience  to  the  user  and  are  not  used  in  the 
logic  of  any  of  the  programs  in  the  TOS  analysis  package. 

It  should  be  noted  that  some  of  the  variables  in  CREATE  are 
redundant.  For  example,  the  LP  and  RP  arrays  contain  some  of  the  same 
information.  This  organization  facilitated  the  coding  of  program 
COMPUTE. 

2.2  BASIC  FLOW  OF  PROGRAM  CREATE 

Exhibit  2-8  contains  a  basic  flowchart  of  program  CREATE.  The  steps 
In  CREATE  are  implemented  In  a  straightforward  serial  fashion.  They  are 
set  up  so  that  succeeding  steps  use  Information  which  are  input  in 
earlier  steps.  This  Information  is  used  to  control  the  internal  DO 
Loops  so  they  provide  the  correct  number  of  prompts. 
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Step  0: 
Step  1: 

Step  2: 

Step  3: 

Step  4: 

Step  5: 

Step  6: 


EXHIBIT  2-8:  BASIC  FLOW  OF  CREATE 


Set  IV  for  long  or  short  prompts  IV  *  I  short 

Brigade  Information 

Enter  number  of  Brigades:  NBDE 

For  each  Brigade,  enter  name,  type  of  processor,  and 
number  of  Battalions:  BDNAME(I),  BD(I),  NBN(I) 

Call  CHECK  for  BD(I)  to  check  name 

Battalion  Information 

For  each  Battalion,  enter  name  and  type  of  processor 
BNNAME(I.J),  BN(I,J}  ( ( I ,J)  =  Battalion  J  of  Brigade  I) 

Call  CHECK  for  BN ( I , J )  to  check  name 

Other  TOS  User  information 

Enter  number  of  Other  TOS  Users:  NOU 

For  each  Other  TOS  User,  enter  name  and  type  of  processor 
OUNAME(I),  0U(I) 

Call  CHECK  for  0U(I)  to  check  name 
Channel  Data 

Enter  number  of  conmuni cations  channels:  NC 
For  each  channel,  enter  the  name  CNAM(I) 

Connect  User  with  Channels 

For  each  Battalion,  enter  name  of  channel  connecting  it  to  its 
parent  Brigade,  MLINK(I,J) 

Call  CHECK  1  to  check  name  and  assign  channel  number  to 
LINK(I,J) 

For  each  Brigade  enter  name  of  channel  connecting  it  to  the 
FEP:  NLINC(I) 

Call  CHECK1  to  check  name  and  assign  channel  number  to 
LINC(I) 

For  each  Other  TOS  User,  enter  name  of  channel  connecting  it  to 
the  FEP:  NLINCK{I) 

Call  CHECK1  to  check  name  and  assign  channel  number  to 
LINCK(I) 

Make  Configuration  Assignments 
Compute  NL,  NR,  NP,  NN 

For  each  TOS  user,  assign  values  to  RNAM(I),  RP(I,1),  RP ( 1 ,2 ) , 
LP( 1,1),  LP( 1,2),  LP( 1 ,3) ,  I PD ( I ) 

Check  to  determine  if  configuration  includes  both  TCSs  and  TCTs 


—  Continued 
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EXHIBIT  2-8:  BASIC  FLOW  OF  CREATE 
(Continued) 


Step  7: 


Step  8: 


Step  9: 


Step  10: 


Message  Data 

Enter  number  of  messages  and  number  of  user  initiated  messages, 
MM,  NUM 

For  each  user-initiated  message  enter  name:  MNAM(I) 

For  each  TOS-initiated  message  enter  name:  MNAM(I) 

For  each  user-initiated  message  enter  mean  length, 
name  of  message  caused  as  output  on  same  route,  and  name  of 
message  caused  as  output  on  other  routes:  MD(I,1),  IMP (1,1), 
IMP ( 1,2) 

Call  CHECK2  to  check  message  names  and  assign  message  numbers 
to  MP ( I , 1 )  and  MP(I,2) 

For  each  TOS-initiated  message,  enter  mean  length:  MD(I,1) 
Assign  MP ( I , 1 )  =  MP( I ,2)  *  0 

Route  Cross  Message  Array 

(If  Array  to  be  inserted  into  file  later,  set  1FG=1  and  bypass 
step  8) 

For  each  Other  TOS  User,  then  for  each  Brigade,  enter  for  each 
user-initiated  message  the  message  initiation  rate: 

RM( I ,J ,1) .  Then  assign  RM(I,J,2)  =  RM(I,J,3)  =  RM(I,J,4) 

=  0 

For  each  TOS-initiated  message  enter  proportionality 

constants  a(  I,J)  and  /3  (I,J),  RM(I,J,1)  and  RM(I,J,2). 
Then  assign  RM(I,J,3)  =  RM(I,J,4)  =  0 
For  each  Battalion,  for  each  user-initiated  message,  enter  the 
message  initiation  rate,  the  probability  that  the  message  is 
deleted  at  Brigade  review  and  the  probability  the  message  is 
altered  at  review:  RM(I,J,1),  RM(I,J,3),  and  RM(I,J,4). 

Call  CHECK  3  to  insure  probabilities  are  in  the  interval 
0-1;  then  assign  RM(I,J,2)  =  0 
For  each  TOS  initiated  message,  enter  proportionality 

constants  a(I,J)  and  /3(I,J),  and  RM(I,J,2);  then  assign 
RM( I ,J  ,3)  =  RM( I ,J ,4)  =  0 

Engineering  Data 

Enter  data  disk  and  message  disk  access  times:  DD(1),  and 
DD(2) 

Enter  TCS  data:  GPD(1...5,  1  and  2) 

Enter  TCT  data:  GPD(7...10,  1  and  2) 

Enter  FEP  data:  GPD(11,  1  and  2),  and  GPD(6,  1  and  2) 

For  each  channel,  enter  rise  time,  transmission  rate,  and 
number  of  lines:  CD(I,1),  CD ( 1 ,2) ,  and  CD( 1,4) 

For  each  message,  enter  data  base  processing  time,  number  of 
message  disk  reads  or  writes,  and  number  of  data  disk  reads 
or  writes:  MD(I,2),  MD (1,3)  and  MD(I,4) 

For  each  Brigade  enter  number  of  templates:  PD ( I ) 

Enter  number  of  templates  at  FEP:  PD(NR+1) 

Assign  PD(I)  =  0  for  all  nodes  not  a  Brigade  or  the  FEP 

Voice  Competition  Data 

For  each  channel,  enter  proportion  of  time  channel  is  used  for 
voice  transmission:  CD(I,3) 

Call  CHECK4  to  Insure  CD(I,3)  is  in  the  range  0-1 


--  Continued  — 
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EXHIBIT  2-8:  BASIC  FLOW  OF  CREATE 

(Concluded) 


[STEP.  11:  Error  Rate  Data 

For  each  Other  TOS  User,  then  for  each  Brigade: 
enter  the  bit  error  rate  for  a  message  from  the  user  to  the 
the  FEP  and  the  bit  error  rate  for  a  message  from  the  FEP  to 
the  user:  LD(I,1),  and  LD(I,2) 

Call  CHECK  3  to  ensure  LD(I,1)  and  LD(I,2)  are  in  the 
interval  0-1 

For  each  Battalion,  enter  the  bit  error  rate  for  a  message  sent 
to  the  parent  Brigade  and  the  bit  error  rate  for  a  message  to 
the  Battalion. 

Call  CHECK  3  to  ensure  LD( 1,1)  and  LD ( 1 ,2 )  are  in  the 
internal  0-1. 

Step  12:  Display  Data 

If  user  wishes  to  display  data,  enter  IW=1 
If  IW-1,  call  DISP,  if  IW  i  1  bypass  step  12 

STEP  13:  Write  Output  File 

If  user  wishes  to  create  an  output  file,  enter  IFW=1 
If  IFW  ^  1,  bypass  step  13. 

If  IFW=1,  Write  countinq  indices  NR,  NM,  NN,  MUM,  NC,  NP,  NL, 
NOU,  NBDE,  and  IFG 

For  each  route  write  RNAM(I),  RP(I,1),  RP(I,2),  and  IPD(I) 

For  each  message  write  MNAM(I),  MP ( 1,1)  MP(I,2),  MD(I,1) 

MD ( 1 , 2 ) ,  MD (1,3) ,  and  MD(I,4) 

For  each  channel,  write  CNAM(I),  CD (1,1) ,  CD( 1,2),  CD(I,3),  and 
CD ( I ,4) 

For  each  processor,  write  PD ( I ) 

For  each  link,  write  LP ( 1,1),  LP(I,2),  LP(I,3),  LD(I,1),  and 
LD (1,2) 

For  each  route,  for  each  message,  write  RM(I,J,1),  RM ( I , J , 2 ) , 
RM( I ,J ,3) ,  and  RM(I,J,4) 

(or  write  a  line  of  if  array  to  be  input  later) 

Write  DD ( 1 ) ,  and  DD(25 

Write  GPD (1,1)  and  GPD(I,2),  for  1*1,... ,11 


Step  14: 


Terminate 
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Also  Included  in  the  internal  logic  of  each  of  the  steps  is  a  means  of 
prompting  using  either  short  or  long  forms  of  the  prompts.  If  the  short 
form  is  elected  in  step  0,  then  in  each  succeeding  step  the  first  of  a 
series  of  similar  prompts  will  contain  a  long,  sentence-like  prompt.  All 
subsequent  prompts  for  similar  data  will  be  given  in  short  form  only. 

This  was  instituted  to  decrease  the  running  time  of  program  CREATE. 

2.3  SUBROUTINES  IN  CREATE 

Exhibit  2-9  lists  the  six  subroutines  which  are  part  of  program 
CREATE  and  indicates  their  basic  functions.  Five  of  the  six  subroutines 
are  used  for  error  checking  during  the  course  of  using  the  program 
CREATE.  The  sixth  subroutine  permits  display  of  the  input  data  in  an 
easy  to  read  format.  Each  of  these  subroutines  is  discussed  in  greater 
detail  in  the  following  paragraphs. 

Subroutine  CHECK  compares  the  name  input  by  the  user  for  the 
processor  at  a  node  against  the  symbols  "TCT"  and  "TCS" .  If  the 
processor  type  which  is  input  by  the  user  does  not  correspond  to  one  of 
these  two  names,  CHECK  will  so  indicate  to  the  user  and  prompt  for  the 
correct  name.  The  checks  and  prompts  will  continue  until  the  user  inputs 
either  "TCT"  or  "TCT". 

Subroutine  CHECK1  compares  the  channel  name  which  the  user  has  input 
as  the  channel  connecting  two  nodes  with  the  list  of  channel  names  which 
was  input  earlier.  If  the  name  the  user  has  input  is  not  contained  in 
the  previously  defined  list,  CHECK1  will  so  indicate  to  the  user  and 
request  another  name  to  be  input.  This  prompting  will  continue  until  a 
proper  channel  name  Is  input.  When  CHECK1  sees  a  proper  channel  name,  it 
will  assign  and  return  the  number  of  that  channel  to  the  main  program 
where  channel  numbers,  not  names,  are  used  for  identification. 


Name 

CHECK 

CHECK1 

CHECK2 

CHECK3 

CHECK4 


EXHIBIT  2-9:  SUBROUTINES  IN  CREATE 
Function 

Checks  processor  type 

Checks  channel  name,  assigns  channel  number 
Checks  message  name,  assigns  message  number 
Checks  probability  range 
Checks  proportion  range 
Displays  data  in  easy  to  read  format 


DISP 


Subroutine  CHECK2  performs  much  the  same  function  as  subroutine  CHECK1. 
Here  the  name  of  the  message  caused  as  an  output  by  a  particular  message 
is  compared  with  the  previously  input  list  of  message  names.  If  the  name 
is  not  contained  in  that  list,  the  user  is  prompted  to  enter  another  name 
until  a  legal  message  name  is  seen.  When  this  occurs,  subroutine  CHECK2 
will  determine  the  number  of  the  message  input  and  return  that  number  to 
the  main  program. 

During  the  course  of  CREATE,  the  user  is  prompted  for  the  probabil¬ 
ities  of  various  actions.  When  the  user  has  answered  such  a  prompt,  the 
number  is  checked  in  the  main  program  to  see  if  it  is  in  the  range  0-1. 

If  the  input  number  is  outside  this  range,  CHECK3  is  called  and  the  user 
is  prompted  to  enter  a  number  in  the  range  0-1. 

Subroutine  CHECK4  is  identical  to  subroutine  CHECK3  except  it  is 
used  to  check  the  input  values  for  proportions  rather  than  probabilities. 
If  the  input  proportion  is  outside  the  range  of  0-1,  CHECK4  is  called. 

When  all  the  data  have  been  input,  the  user  is  presented  with  the 
instruction,  "If  you  want  to  display  the  output  file,  enter  a  1".  If  the 
user  enters  a  1,  subroutine  DISP  is  called  and  the  data  are  printed  at 
the  terminal  in  an  easy  to  read  format.  Subroutine  DISP  is  essentially 
program  DISPLAY;  however,  the  data  are  passed  as  subroutine  arguments 
rather  than  being  read  in  from  an  input  file,  as  is  the  case  with  program 
DISPLAY. 

2.4  DATA  FILE 


Exhibit  2-10  contains  a  description  of  the  data  file  which  is  the 
output  of  program  CREATE.  The  variable  names  are  as  defined  in  exhibits 
2-1  through  2-7  in  which  the  formats  of  the  lines  in  the  output  files  are 


EXHIBIT  2-10:  OUTPUT  FILE  FORMAT 


Line 


1 


2 

thru 

NR+1 


NR+2 

thru 

NR+NM+1 


NR+NM+2 

thru 

NR+NM+NC+1 


Elements 

COUNTERS 

NR,  NM,  NN,  NUM,  NC,  NP,  NL,  NOU, 
NBDE,  IFG 

ROUTE  INFORMATION 

RNAM(I),  RP(I,1),  RP (1,2),  IPD(I) 


MESSAGE  INFORMATION 


MNAM(I),  MP( I ,1) ,  MP( I ,2) ,  MD(I,1), 
MD( 1 ,2) ,  M0( 1,3),  MD( 1 ,4) 


CHANNEL  INFORMATION 


CNAM(I),  CD(I ,1) ,  CD( I ,2) ,  CD( I ,3) 
CD ( I ,4) 


NR+NM+NC+2 

thru 

NR+NM+NC+NP+1 


NUMBER  OF  TEMPLATES 
PD(I) 


NR+NM+NC+NP+2 

thru 

NR+NM+NC+NP+NL+1 

_ 


LINK  DATA 


LP (1,1),  LP (1,2),  LP( 1 ,3) ,  LD ( 1 , 1 ) 
LD( I ,2) 


Format 

10(13,  IX) 

A8,  3( 1X,I3) 


A8,  2(1X,I3) , 
4(1X,  E9.3) 


A8,  4(1X,E9.3) 


2X,  13 


3(13,  IX), 
2(E12.6,  IX) 


EXHIBIT  2-10:  OUTPUT  FILE  FORMAT 
(Concluded) 


ROUTE  CROSS  MESSAGE  ARRAY 
(If  IFG=1  the  array  is  a  line  of  50  "*s") 


NR+NM+NC+NP+NL+2 ' 


NR+NM+NC+NP+NL+ 

NM+1 


RM(1,J,1) ,  RM(1 ,J ,2) ,  RM(1,J,3),  RM(1,J,4)  4(E9.3,1X) 


NR+NM+NC+NP+NL 

+(NR-l)*NM+2 

thru 

NR+NM+NC+NP+NL 

+NR*NM+1 


RM(NR,J,1) ,RM(NR,J,2) ,RM(NR,J ,3) ,RM(NR,J ,4)  4(E9.3,1X) 


NR+NM+NC+NP 

+NL+NR*NM+2 


DISK  ACCESS  TIMES 


OD ( 1 ) ,  DO (2) 


2(E9.3,  IX) 


GENERAL  PROCESSOR  DATA 


NR+NM+NC+NP 

+NL+NR*NM+3 


NR+NM+NC+NP 

+NL+NR*NM+13 


2  ( E9 . 3 ,  IX ) 


GPD( 1,1),  GPO( I ,2) 
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also  shown.  This  output  file  Is  set  up  so  that  the  first  line  contains 
the  counters  which  are  used  to  determine  the  number  of  lines  In  the  dif¬ 
ferent  sections  of  the  data  file.  For  example,  NR  Indicates  the  number 
of  lines  In  the  Route  Information  section;  NM,  the  number  of  lines  in  the 
Message  Information  section;  etc.  The  file  is  implemented  in  this  manner 
so  that  the  controls  for  reading  the  file  would  be  contained  within  the 
file  itself  and  no  other  information  need  be  given.  This  data  file  is  in 
a  format  compatible  with  the  other  three  programs  in  the  TOS  analysis 
package. 

2.5  CODE  OF  PROGRAM  CREATE 

Program  CREATE  is  written  in  FORTRAN  IV  using  library  subroutines 
existing  on  the  Amdahl  460/V7  computer  at  The  University  of  Michigan. 

The  code  is  liberally  interspersed  with  conment  statements  which  indicate 
the  function  of  the  various  parts  of  the  program. 

The  initial  version  of  program  CREATE  was  a  short,  simple  program 
which  would  suffice  for  most  applications;  however,  during  the  checkout 
of  the  other  programs  in  the  analysis  package,  it  was  obvious  that  addi¬ 
tional  logic  needed  to  be  included  in  CREATE  to  permit  its  use  with  vari¬ 
ous  test  cases.  In  its  simplest  form,  CREATE  was  implemented  assuming  a 
standard  division  configuration  which  had  more  than  one  brigade,  more 
than  one  battalion  for  each  brigade,  and  more  than  one  other  TOS  user. 

In  this  case,  simple  00  LOOPS  will  suffice;  however,  test  cases  were 
implemented  which  contained  only  one  or  two  nodes  and  in  those  situations 
additional  logic  was  required  to  bypass  unnecessary  DO  LOOPS.  Thus, 
there  are  a  large  number  of  "IF"  comparisons  in  CREATE.  These  are  checks 
to  bypass  portions  of  code  which  are  not  needed. 


The  evolution  of  program  CREATE  included  a  decision  to  implement  a 
series  of  short  prompts  as  part  of  the  program.  There  are  essentially 
two  sets  of  queries  contained  in  CREATE.  One  set  contains  long, 
sentence-like  queries.  In  the  other  set  the  queries  are  short  and  are 
used  to  prompt  for  subsequent  entries  of  a  similar  type.  Thus,  there  are 
also  numerous  logic  checks  to  determine  when  these  short  prompts  are  to 
be  called.  This  also  necessitated  additional  logic  to  account  for  the 
various  test  cases  which  were  to  be  implemented,  although  most  of  that 
logic  would  not  be  exercised  if  the  program  is  used  for  the  input  of  a 
standard  division  configuration. 

All  of  the  input  statements  in  program  CREATE  are  free  format  and 
make  use  of  the  library  program,  FREAD,  which  is  available  on  the  Amdahl 
computer  on  which  program  CREATE  was  written.  These  free  format  read 
statements  were  implemented  to  make  the  user's  task  of  inputing  the  data 
easier.  If  program  CREATE  is  implemented  on  a  different  computer  system, 
the  user  must  determine  if  FREAD  is  available.  If  FREAD  is  not  avail¬ 
able,  the  input  statements  need  to  be  replaced  with  either  conventional 
formatted  statements  or  with  whatever  free  format  subroutine  is  available 


on  the  host  machine. 


3.0  PROGRAM  MODIFY 


Program  MODIFY  was  written  to  facilitate  alteration  of  an  existing 
data  file.  The  program  is  written  in  FORTRAN  IV  and  is  designed  to  be  run 
interactively  from  a  terminal.  This  section  provides  information  which 
may  be  of  use  to  a  programmer  who  wishes  to  modify  the  logic  of  this 
program  or  to  transfer  this  program  to  a  new  computer  system.  Section 
3.1  contains  a  description  of  the  structure  of  the  program  MODIFY  and 
provides  a  list  of  the  subroutines  which  are  used.  Section  3.2  contains 
a  discussion  of  the  code  and  how  to  modify  the  existing  code  within  the 
framework  of  the  structure  described  in  section  3.1.  Section  3.3 
contains  flowcharts  of  the  main  program  and  subroutine. 

3.1  Structure  of  Program  MODIFY 

Program  MODIFY  is  implemented  as  a  main  executive  program  which 
calls  several  subroutines  to  perform  the  actual  modification  of  input 
data.  Exhibit  3-1  illustrates  the  general  structure  of  the  program. 

The  data  file  for  the  TOS  analysis  package  consists  of  data  of  six 
logical  types.  Exhibits  2-1  through  2-6  list  the  data  by  type.  This 
classification  of  data  by  type  is  reflected  in  the  structure  of  program 
MODIFY.  The  main  executive  program  calls  six  subroutines  to  perform 
modification  of  data,  one  for  each  type  of  data.  Exhibit  3-2  relates 
these  six  subroutines  to  the  type  of  data  which  they  modify. 

Program  MODIFY  also  uses  three  utility  subroutines  to  perform 
I/O  functions.  Subroutine  READF  reads  an  existing  data  file  from  I/O 
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unit  1.  Subroutine  WRITEF  writes  a  new  data  file  onto  I/O  unit  2. 
Subroutine  FREAD  Is  a  general  free-format  read  routine  which  is  discussed 
In  section  2.3. 

3.2  CODE  OF  PROGRAM  MODIFY 

The  code  of  program  MODIFY  was  produced  using  a  top-down  approach. 
The  result  Is  a  modular  program  which  consists  of  a  short  executive  main 
program  and  a  number  of  specialized  subroutines.  Section  3.1  describes 
the  structure  of  program  MODIFY  and  lists  its  subroutines.  A  detailed 
flowchart  of  program  MODIFY  is  found  in  section  3.3. 

Three  utility  subroutines  are  used  to  perform  I/O  functions.  READF 
reads  the  data  file  from  I/O  unit  1.  This  routine  was  created  by  copying 
the  code  used  to  perform  the  same  function  in  program  DISPLAY.  WRITEF 
writes  the  new  data  file  to  I/O  unit  2  and  was  created  by  copying  code 
used  by  program  CREATE.  The  free-format  read  subroutine,  FREAD,  is  a 
library  program  on  the  Amdahl  computer  at  The  University  of  Michigan. 

The  actual  modification  of  data  is  performed  by  the  six  subroutines 
listed  in  exhibit  3-2.  The  six  subroutines  correspond  to  the  six  types 
of  data  in  the  data  file.  The  coding  of  these  subroutines  was  performed 
to  allow  modification  of  those  data  which  were  changed  in  the  course  of 
the  analysis  of  the  TOS  communications  network;  however,  the  program  does 
not  currently  allow  modification  of  all  of  the  data  items. 

Subroutine  COMSYS  allows  the  user  to  modify  and  examne  any  of  the 
communication  system  data.  Subroutine  LDFACT  allows  modification  of  some 
of  the  route  cross  message  data.  The  user  is  allowed  to  multiply  message 
traffic  rates  for  the  entire  communications  network  by  a  factor.  Sub¬ 
routine  NOISE  allows  the  user  to  set  bit  error  rates  by  channel,  and  to 


EXHIBIT  3-2:  DATA  MODIFICATION  SUBROUTINES  USED  BY  PROGRAM  MODIFY 


Subrouti ne 

CONFIG 

COMSYS 

MSG 

PROC 

LDFACT 


Type  of  Data  Modified 
System  Configuration 
Communications  System 
Message  Data 
Processor  Data 
Route  Cross  Message  Data 


NOISE 


Bit  Error  Rates 
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display  bit  error  rates.  All  of  the  code  which  displays  input  data  was 
copied  from  program  DISPLAY.  Subroutines  CONFIG,  MSG,  and  PROC  are  dummy 
routines,  since  it  was  not  necessary,  in  the  course  of  the  analysis  of 
TOS,  to  use  program  MODIFY  to  change  the  values  of  any  of  the 
configuration,  message,  or  processor  data. 

In  order  to  extend  the  range  of  the  current  version  of  MODIFY  to 
allow  modification  of  other  data  items,  the  programmer  may  write  new 
versions  of  some  or  all  of  the  six  special  subroutines  which  perform  data 
modification.  Some  changes  would  be  straightforward.  For  example,  it 
would  be  easy  to  write  into  subroutine  PROC  the  ability  to  replace  most 
of  the  processor  data;  however,  some  other  modifications  are  more 
complex,  and  could  involve  the  creation  of  interdependence  among  the  six 
subroutines.  For  example,  the  Insertion  or  deletion  of  nodes  in  CONFIG, 
which  handles  configuration  data,  may  necessitate  insertion,  deletion,  or 
adjustment  of  communication  system  data,  message  data,  route  cross 
message  data,  and  error  rate  data.  Such  changes  should  preferably  be 
handled  by  requiring  the  user  to  run  program  CREATE  to  create  a  new  data 
file.  The  current  version  of  MODIFY  is  designed  to  replace  existing 
values  in  the  input  data  file,  not  to  insert  or  delete  data. 

3.3  FLOW  CHARTS  OF  THE  PROGRAM  MODIFY  AND  SELECTED  SUBROUTINES 

Exhibits  3-3  through  3-6  contains  detailed  flowcharts  of  the  main 
program  and  subroutines  COMSYS,  LDFACT,  and  NOISE. 


EXHIBIT  3-3:  FLOWCHART  FOR  PROGRAM  MODIFY 


START 


call 

READF 


Prompt 

User 


call 

FREAD 


call 

CONFIG 


Prompt 

User 


Read  Data  File 
from  I/O  Unit  1. 


"Do  you  wish  to 

alter  the  configuration?" 


Read  response. 


Alter  configuration  data. 


"Do  you  wish  to  alter 
the  communications  system? 


■-  Continued  — 


EXHIBIT  3-3:  FLOWCHART  FOR  PROGRAM  MODIFY  (Continued) 


Read  response. 


Alter  communications 
system  data. 


"Do  you  wish  to  alter 
the  message  data?" 


Read  response. 


Alter  message  data. 


Continued 


EXHIBIT  3-3:  FLOWCHART  FOR  PROGRAM  MODIFY  (Continued) 


"Do  you  wish  to  alter 
the  processor  data?" 


Read  response. 


Alter  processor  data. 


"Do  you  wish  to  alter 
the  system  loads?" 


Read  response, 


--  Continued  -- 


EXHIBIT  3-3:  FLOWCHART  FOR  PROGRAM  MODIFY  (Continued) 


Alter  Route  Cross 
Message  Data. 


"Do  you  wish  to  alter 
the  error  rates?" 


Read  response. 


Alter  error  rates. 


"Do  you  wish  to  make  any 
additional  changes?" 


Continued 
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EXHIBIT  3-4:  FLOWCHART  OF  SUBROUTINE  COMSYS  (Continued) 


(  call 

l  FREAD 

J 

"Enter  data  for  channel..." 


User  inputs  data  for 
channel  I. 


Next  channel. 


Last  channel? 


"Do  you  wish  to  see 
current  communications 
system  data?" 


Read  response, 


—  Continued  -■ 
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EXHIBIT  3-4:  FLOWCHART  OF  SUBROUTINE  COMSYS  (Concluded) 


Use  code  from  DISPLAY 
to  display  this  data. 


"Do  you  wish  to  change  more 
communications  system  data? 


Read  response. 


EXHIBIT  3-6:  FLOWCHART  OF  SUBROUTINE  NOISE 


"How  many  channels  do  you 
wish  to  enter  data  for?" 


Read  NUMB. 


"Enter  the  numbers  of 
those  channels." 


User  inputs  index 
of  each  channel . 


Initialize  DO  LOOP  index. 


"Enter  error  rate 
for  channel ..." 


-  Continued  -- 


EXHIBIT  3-6:  FLOWCHART  OF  SUBROUTINE  NOISE  (Continued) 


Last  channel? 


"Do  you  wish  to  see 
current  noise  levels?" 


Read  response. 


Use  code  from  DISPLAY 
to  display  error  rates 


"Do  you  wish  to  change 
more  error  rates?" 


Read  response. 


EXHIBIT  3-6:  FLOWCHART  OF  SUBROUTINE  NOISE  (Concluded) 
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4.0  PROGRAM  DISPLAY 

The  third  of  the  four  programs  in  the  TOS  analysis  package  was 
written  to  assist  the  user  in  examining  the  contents  of  the  data  file. 
Program  DISPLAY  will  read  the  data  file  and  print  the  information  with 
appropriate  headings  so  that  the  user  can  easily  examine  the  contents  of 
the  data  file. 

Program  DISPLAY  will  mesh  with  the  outputs  of  both  program  CREATE 
and  program  MODIFY.  The  read  statements  in  program  DISPLAY  are  copies  of 

the  write  statements  from  the  other  two  programs,  with  the  word  READ 

inserted  in  the  place  of  WRITE.  This  was  done  to  assure  compatibility 
between  the  progams.  Program  DISPLAY  is  set  up  to  operate  on  the  Amdahl 

computer  at  The  University  of  Michigan.  This  computer  allows  the  user  to 

specify  input  devices  on  the  job  control  card s.  Thus,  the  read  state¬ 
ments  in  program  DISPLAY  are  not  the  normal  "READ(5 ,  )"  statements  which 
are  found  in  most  FORTRAN  codes,  but  rather  are  READ(2,  ).  Thus,  the 
user  is  required  to  inform  the  operating  system  that  device  two  contains 
the  file  which  is  to  be  displayed.  If  DISPLAY  is  implemented  on  another 
computer  system,  the  compatibility  with  the  read  statements  and  the  job 
control  cards  must  be  ensured  so  that  program  DISPLAY  is  linked  to  the 
proper  data  file. 

Program  DISPLAY  was  written  in  standard  FORTRAN  IV.  The  listing 
contained  in  Appendix  A  contains  extensive  comment  lines  which  are  used 
to  identify  the  functions  being  performed.  The  first  card  read  from  the 
data  file  contains  the  counters  which  are  used  to  control  the  DO  LOOPS 


which  make  up  the  remainder  of  program  DISPLAY.  The  ordering  of  the 
route  numbers,  messages,  and  channels  is  the  same  as  that  contained  in 
the  other  three  programs  and  is  used  internally  in  DISPLAY.  Program 
DISPLAY  contains  the  option  of  reading  data  files  which  do  not  contain 
the  Route  Cross  Message  Array.  If  such  a  data  file  is  used  as  the  input 
for  DISPLAY,  the  header  for  the  Route  Cross  Message  Array  is  printed  in 
the  output  along  with  a  message  saying  that  the  array  is  to  be  read  in 


5.0  PROGRAM  COMPUTE 


Program  COMPUTE  performs  the  computations  specified  by  the  model  and 
displays  the  ouputs.  COMPUTE  is  organized  into  five  modules,  as  shown  in 
exhibit  5-1.  Three  of  the  program  modules,  the  Traffic  Flow  Module,  the 
Operating  Statistics  Module,  and  the  Performance  Measure  Module,  corres¬ 
pond  to  the  three  modules  of  the  same  names  in  the  mathematical  model. 1 
The  correspondence  is  not  quite  exact  due  to  programming  considerations 
such  as  producing  efficient  code  and  minimizing  the  program's  memory 
requirements.  Nonetheless,  the  primary  content  of  the  modules  is 
unchanged. 

The  program  documentation  consists  of  a  series  of  exhibits  present¬ 
ing:  (1)  flowcharts;  (2)  descriptions  of  the  program  variables;  and 
(3)  use  of  I/O  units.  Flowcharts  for  the  Input  and  Initialization  and 
Traffic  Flow  Modules  are  presented  in  exhibits  5-2  and  5-3.  A  flowchart 
for  the  Operating  Statistics  Module  is  presented  in  exhibit  5-4.  In  this 
flowchart,  two  segments  are  labeled  A  and  B.  More  detailed  flowcharts 
for  these  segments  are  presented  in  exhibits  5-5  and  5-6.  Exhibit  5-7 
contains  a  flowchart  for  a  subroutine  called  by  segment  A  of  the  Opera¬ 
ting  Statistics  Module.  Flowcharts  for  the  Performance  Measure  Module 
and  the  Output  Module  are  presented  in  exhibits  5-8  and  5-9.  A  list  and 
description  of  the  variables  used  in  the  program  are  presented  in  exhibit 
5-10.  Exhibit  5-11  shows  the  use  of  logical  I/O  units. 

ISee  ARI  Research  Notes  80-13,  Chapter  3.0. 
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EXHIBIT  5-1 :  ORGANIZATION  OF  COMPUTE 


Output 

Module 
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EXHIBIT  5 


-2:  FLOWCHART  FOR  THE  INPUT  AND 
INITIALIZATION  MODULE 


Begin 


IT 

Prompt  for 
^  and  Read 

Inputs  from 
Terminal 

1 

L 

Read 

^  Input 

File 

1 

r 

Adjust  all 
Time  Units  to 
Minutes 


i 


Initialize 
Output  Arrays 
to  Zero 


EXHIBIT  5-3:  FLOWCHART  FOR  THE  TRAFFIC  FLOW  MODULE 


Begin 


r - 

For  each  user  originated  message 

> 

type  I,  and  each  user  J: 

Increment  the  rate  of  DCC 
output  messages  of  type  II 
sent  to  user  J,  where  II  is 
the  message  type  of  DCC 
responses  sent  to  the  originator 
of  messages  of  type  I 


Increment  the  rates  of  DCC 
output  messages  of  type  12 
to  all  users  except  J,  where 
12  is  the  message  type  of 
DCC  responses  sent  to  users 
other  than  the  originator 
of  messages  of  type  I 


Proceed 
to  next 
module 


EXHIBIT  5-4:  FLOWCHART  FOR  THE  OPERATING  STATISTICS  MODULE 


For  each  user  I  and  each  message  type  J: 


SEGMENT  A: 

Assign  Temporary 

parameter  values 

J 

'  SEGMENT  B: 

For  each  processor  and  channel 
on  the  route  compute 
the  arrival  rate,  mean 
service  time  and  second 
,  moment  of  the  service  time 


Compute  the  probability  that 
all  lines  of  a  multiline 
channel  are  busy 


Proceed 
to  next 
node 


EXHIBIT  5-5:  FLOWCHART  FOR  SEGMENT  A  OF  THE  OPERATING  STATISTICS  MODULE 


Begin 


Set  pointers  to 
links,  processors,  and 
channels  on  route 


f  Compute  the  rate  of  origination  plus 
the  rate  of  hierarchical  review  deletion  plus 
L  the  rate  of  hierarchical  review  alteration 


Compute  the  rate  of  arrival  to 
or  departure  from  DCC 


Fill  array  with  times  for 
various  processing  activities 


Call  subroutine  TRANS  to  compute 
the  first  and  second  moments  of  the 
distribution  of  the  number  of 
transmissions  to  success  in  each 
direction  on  each  link  on  the  route 


Proceed 

to 

segment 


5- 


EXHIBIT  5-6:  FLOWCHART  FOR  SEGMENT  B  OF  OPERATING  STATISTICS  MODULE 


Begin 


Computations 
for  user's 
termi nal 


'  User  is  a  \ 
Bn  (i.e.,  2  links 
.  on  route)  / 


Message 
type  is  user¬ 
generated 


Computations 
for  other  DCC 
v  components 


Computations 
for  user's 
terminal 


(  Computations  \ 

(  Computations \ 

1  for  channel  from) 

(  for  channel  to  ) 

\user's  terminal J 

^user's  terminal J 

User  is  a  \ 
Bn  (i.e.,  2  links 
on  route)  / 


(  Computations^ 

I  for  user's  BDE  j 

f  Computations^ 
f  for  user's  BDE  j 

V  processor  J 

V  processor  J 
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EXHIBIT  5-7:  FLOWCHART  FOR  SUBROUTINE  TRANS 


Begin 


Compute  PBCH  =  probability  a  transmission 
of  a  character  has  2  or  more  bits  in 
error  after  Hamming  code  or  multiple 
^  _  blocking  recovery  . 


Compute  SM  *  the  second  moment  of  the 
number  of  transmissions  to 
success  witn  no  RMC 
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EXHIBIT  5-7:  FLOWCHART  FOR  SUBROUTINE  TRANS  (Concluded) 


(Continuation) 

V 


Initialize: 


EN  =  1 
FM  =0 
SM  =  0 
ROLEN  =  0 
PGLTN  =  0 


£ 


Compute  PGLEN  *  probability  of  ACK 
from  less  than  or  equal  to  EN  transmissions. 


Increment  FM  by  EN  times  the  probability 
of  the  first  ACK  on  the  ENth  transmission 


Increment  SM  by  ENC  times  the  probability 
of  the  first  ACK  on  the  ENth  transmission 

j 


Assign  the  value  of  PGLEN  to  PGLTN 
the  probability  of  ACK  from  less 
than  EN  transmissions 


c 


Increment  EN 


hyij 


PGLEN  <  0.999 


F 
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EXHIBIT  5-8:  FLOWCHART  FOR  THE  PERFORMANCE  MEASURE  MODULE 


r 


r 


v. 

r 


K. 


For  the  DCC  components,  compute  and 
assign  values  to  the  output  array  for: 
Expected  waiting  time 
Expected  delay 
Expected  queue  length 
Traffic  rate 
Util i zation 
Capacity 


I 


For  the  channels,  compute  and  assign 
values  to  the  output  array  for: 
Expected  waiting  time 
Expected  delay 
Expected  queue  length 
Traffic  rate 
Uti 1 i zation 
Capacity 


For  the  processors,  compute  and  assign 
values  to  the  output  array  for: 
Expected  waiting  time 
Expected  delay 
Expected  queue  length 
Traffic  rate 
Utilization 
Capacity 


For  each  user  route  to  the  DCC,  compute 
and  assign  values  to  the  otuput  array  for: 

Expected  waiting  time 
Expected  delay 
Traffic  rate 

For  each  message  type,  compute  and  assign  values 
to  the  output  array  for  the  expected  waiting  time. 


For  each  message  type,  compute  and  assign 
values  to  the  output  array  for: 

Expected  delay 
Traffic  rate 


Proceed 
to  next 
modul e> 
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EXHIBIT  5-9:  FLOWCHART  FOR  THE  OUTPUT  MODULE 


Begin 


Go  to 

appropriate 

segment 


Rank 

Routes 


Rank 

Message 

Types 


Rank 

Processors 


Rank 

Channel s 


Display 

for 

Routes 


Display  for 
Message 
Types 


Display 

for 

Processors 


Display 

for 

Channel s 


Display 
for  DCC 
Components 


EXHIBIT  5-10:  VARIABLES  IN  COMPUTE 


NAME 

A 

AMI 

AM2 

AM3 

B 


USE 

Temporary  -  Rate  at  which  messages  of  type  J  travel  to 
or  from  user  I  (including  returns  due  to  hierarchical 
review) . 

Temporary  -  Mean  time  for  a  processing  or  communications 
operation. 

Temporary  -  Mean  time  for  a  processing  or  communications 
operation 

Temporary  -  Mean  time  for  a  processing  or  communications 
operation. 

Temporary  -  Rate  at  which  messages  of  type  J  arrive  or 
leave  the  DCC  to/from  user  I. 


CD  (I,  J) 


CNAM  (I) 
COUT  (I,  J) 


CS  (I) 


Input  -  channel  data: 

CD  (I,  1)  -  overhead  time  per  transmission  on  channel  I 
CD  (I,  2)  =  transmission  rate  on  channel  I 
CD  (I,  3)  *  fraction  of  time  used  for  voice  on  channel  I 
CD  (1,  4)  =  number  of  links  on  channel  I 

Input  -  name  of  channel  I 

Output  -  channel  outputs: 

COUT  (I,  1)  =  expected  delay  on  channel  I 

COUT  (I,  2)  =  expected  queue  length  on  channel  I 

COUT  (I,  3)  =  traffic  rate  on  channel  I 

COUT  (I,  4)  =  utilization  on  channel  I 

COUT  (I,  5)  =  capacity  on  channel  I 

COUT  (I,  6)  =  rank  on  channel  I 

Temporary  -  probability  all  lines  on  channel  I  are  busy. 


Cl 


Temporary  -  pointer  to  channel  of  first  link  on  a  route. 


C2 


Temporary  -  pointer  to  channel  of  second  link  on  a 
route. 


DD  (I)  Input  -  disk  controller  data: 

DD  (1)  =  mean  access  time  of  message  disk. 
DD  (2)  s  mean  access  time  of  data  disk. 


-  Continued  -- 


EXHIBIT  5-10:  VARIABLES  IN  COMPUTE  (Continued) 


NAME  USE 

DOUT  (I,  J)  Output  -  DCC  component  (except  FEP)  output: 
D  (I,  1)  =  expected  delay 
0  (I,  2)  =  expectd  queue  length 
D  (I,  3)  =  traffic  rate 
0  (I,  4)  =  utilization 
0  (I,  5)  =  capacity 
1=1  =>  OBP 

1=2  =>  Message  Disk  Controller 

1=3  =>  Data  Disk  Controller 


FACT  Temporary  -  factorial 


FM 

Temporary  -  Mean 

number 

of 

transmissions 

to 

success 

in 

one  direction  on 

a  link 

FM1 

Temporary  -  Mean 

number 

of 

transmissions 

to 

success 

in 

one  direction  on 

a  link 

FM2 

Temporary  -  Mean 

number 

of 

transmissions 

to 

success 

in 

one  direction  on 

a  link 

FM3 

Temporary  -  Mean 

number 

of 

transmissions 

to 

success 

in 

one  direction  on 

a  link 

FM4 

Temporary  -  Mean 

number 

of 

transmissions 

to 

success 

in 

one  direction  on 

a  link 

GPD  (I,  J) 

Input  -  Processing  time 

information: 

GPD  (1,  J)  =  TCS  origination  time 
GPD  (2,  J)  =  TCS  send  time 
GPD  (3,  J)  =  TCS  receive  time 
GPD  (5,  J)  =  TCS  terminate  time 

GPD  (6,  J)  =  FEP  terminate  time 

GPD  (7,  J)  =  TCT  terminate  time 

GPD  (8,  J)  =  TCT  send  time 

GPD  (9,  J)  =  TCT  receive  time 
GPD  (10,  J)  =  TCT  terminate  time 
GPD  (11,  J)  =  FEP  originate  time 
J  =  1  =>  per  message 
J  =  2  =>  per  character 


IA 


Temporary  -  Counter  or  pointer 

Input  -  Pointer  to  current  output  table 


—  Continued  — 


EXHIBIT  5-10:  VARIABLES  IN  COMPUTE  (Continued) 


NAME 

IB 

IC 

IP 

I PD  (I) 

IRMC 

11 

12 

J 

JPD 

K 

LARGE 
LD  (I,J) 

LP  (I,J) 

LI 

L2 


USE 

Input  -  Pointer  to  column  for  ranking. 

Input  -  Reordering  switch. 

Temporary  -  Counter. 

Input  -  Processor  data  -  type  of  processor  at  node  I, 
1  =>  TCS,  2  =>  TCT. 


Input  -  Retained  Message  Copy  (RMC)  Switch. 

Temporary  -  Pointer  to  message  type  of  outputs  in 
response  to  inputs  of  type  I  sent  to  the  originator  of 
the  message  of  type  I. 

Temporary  -  Pointer  to  message  type  of  outputs  in 
response  to  inputs  of  type  I  sent  to  users  other  than 
the  originator  of  the  message  of  type  I. 

Temporary  -  Counter  and  pointer. 

Temporary  -  Type  of  current  processor. 

Temporary  -  Counter  and  pointer. 

Temporary  -  10^0. 

Input  -  Link  data  on  error  rates 
LD  (I,  1)  =  Error  rate  on  Link  I  for  messages  sent 
towards  the  DCC. 

LD  (I,  2)  =  Error  rate  on  Link  I  for  messages  sent 
towards  a  user. 

Input  -  Pointers  to  devices  on  links. 

LP  (I,  1)  =  Processor  closest  to  user  on  Link  I 

LP  (I,  2)  =  Channel  used  by  Link  I 

LP  (I,  3)  =  Processor  closest  to  DCC  on  Link  I 

Temporary  -  Pointer  to  the  first  link  on  the  route  from 

a  user  to  the  DCC. 

Temporary  -  Pointer  to  the  second  link  on  the  route  from 
a  user  to  the  DCC.  Value  zero  if  there  is  no  second 
link. 


—  Continued  — 
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EXHIBIT  5-10:  VARIABLES  IN  COMPUTE  (Continued) 


NAME 
MD  (I,J) 


MDJ1 
MNAM  (I) 
MOUT  (I,  J) 


MP  (I,J) 


MS 

NBLOCK 

NC 

NL 

NM 

NN 

NO  (I,  J) 


N0N1 

NP 


USE 


Input  -  Message  data: 

MD  (I,  1)  =  Number  of  characters  in  Message  Type  I 
MO  (I,  2)  =  OBP  processing  time  of  Message  Type  I 
MD  (I,  3)  =  Number  of  message  disk  accesses  for  messages 
of  type  I 

MO  (1,4)  =  Number  of  Data  Disk  accesses  for  messages 
of  type  I 

Temporary  -  Length  of  current  message  type 
Input  -  Message  Names 
Output  -  Message  outputs: 

MOUT  (I,  2)  =  Expected  delay  in  Message  Type  I 
MOUT  (I,  2)  =  Traffic  rate  in  Message  Type  I 
MOUT  (I,  3)  =  Rank  in  Message  Type  I 

Input  - 

MP  (I,  1)  =  Message  type  of  same-route  outputs  in 
response  to  messages  of  type  I 
MP  (I,  2)  =  Message  type  of  other-route  outputs  in 
response  to  messages  of  type  I 


Temporary. 

Input  -  Blocking  number 
Input  -  Number  of  channels 

Input  -  Number  of  links 

Input  -  Number  of  message  types. 

Input  -  Number  of  nodes 

Temporary  - 

NO  (I,  1)  =  Accumulator  for  Node  I  mean  service  time 
NO  (I,  2)  =  Node  I  arrival  rate. 

NO  (I,  3)  =  Accumulator  for  Node  I  standard  deviation  of 
service  time. 

Temporary  -  Utilization  of  a  component 
Input  -  Number  of  processors 


Continued 
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EXHIBIT  5-10:  VARIABLES  IN  COMPUTE  (Continued) 


NAME 

USE 

NP11 

Temporary  -  NP-1. 

NR 

Input  -  Number  of  users. 

NUM 

Input  -  Number  of  user  input  message  types. 

N1 

Temporary  -  General  purpose 

poi nter. 

N2 

Temporary  -  General  purpose 

poi nter. 

N3 

Temporary  -  General  purpose 

pointer. 

N4 

Temporary  -  General  purpose 

pointer. 

N5 

Temporary  -  General  purpose 

poi nter. 

PD  (I) 

Input  -  Number  of  templates 
processor  I.  (0  for  TCTs). 

for  screening  messages  at  a 

POUT  (I,  J) 


RM  (I,  J,  K) 


RMO  (I,  J) 


Output  -  Processor  outputs  : 

POUT  (I,  1)  =  expected  delay  at  processor  I 

POUT  (I,  2)  =  expected  queue  length  at  processor  I 

POUT  (I,  3)  =  traffic  rate  at  processor  I 

POUT  (I,  4)  =  utilization  at  processor  I 

POUT  (I,  5)  =  capacity  at  processor  I 

POUT  (I,  6)  =  rank  at  processor  I 


Input  -  Route  cross  message  type  data: 

RM  (I,  J,  1)  =  Initiation  rate  for  user  generated 

messages,  proportional ity  constant  for 
TOS-generated  messages. 

RM  (I,  J,  2)  =  Second  proportionality  constant  for  TOS- 
generated  messages. 

RM  (I,  J,  3)  =  Probability  of  hierarchical  review 

deletion  for  battalion  user-generated 
messages,  else  zero. 

RM  (I,  J,  4)  =  Probability  of  hierarchical  review 
alteration  for  battalion-generated 
messages,  else  zero. 

Temporary  -  Rate  of  each  type  of  message  at  each  node 


RMAM  (I) 


Input  -  Names  of  users. 


Continued 
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EXHIBIT  5-10:  VARIABLES  IN  COMPUTE  (Concluded) 


NAME  USE 

ROUT  (I,  J)  Output  -  Route  outputs: 

ROUT  (I,  1)  =  Expected  delay  on  route  I 
ROUT  (I,  2)  =  Traffic  rate  on  route  I 
ROUT  (I,  3)  =  Rank  of  route  I 

RP  (I,  J)  Input  -  Pointers  to  the  first  and  second  links  on 

route  I.  (Second  pointer  zero  if  no  second  link.) 


SM 


Temporary  -  Second  moment  of  the  number  of  transmissions 
to  success  on  a  link  to  the  FEP. 


SMI 


Temporary  -  Second  moment  of  the  number  of  transmissions 
to  success  on  a  link. 


SM2  Temporary  -  Second  moment  of  the  number  of  transmissions 

to  success  on  a  link. 

SM3  Temporary  -  Second  moment  of  the  number  of  transmissions 

to  success  on  a  link. 


SM4 

SUM 

T  (I,  J,  K) 

VT 

VM1 

VM2 

VM3 


Temporary  -  Second  moment  of  the  number  of  transmissions 
to  success  on  a  link. 

Temporary  -  Scratch  pad. 

Temporary  -  Times  for  various  processing  activities. 
Temporary  -  Scratch  pad. 

Temporary  -  Second  moment  of  service  time. 

Temporary  -  Second  moment  of  service  time. 

Temporary  -  Second  moment  of  service  time. 

Temporary  -  Scratch  pad. 


X 


APPENDIX  A:  LISTINGS  OF  TOS  SIMULATION  PACKAGE  PROGRAMS 


This  appendix  contains  source  listings  of  the  programs  which  make  up 
the  TOS  Simulation  Package.  These  programs  are  named  CREATE,  DISPLAY, 
MODIFY,  and  COMPUTE.  The  statements  within  a  single  routine  can  be 
referenced  either  by  a  line  number  or  by  an  internal  statement  number. 
Line  numbers,  shown  on  the  left-hand  side  of  each  listing,  begin  with 
unity  for  each  program  and  continue  sequentially  to  the  end  of  the  pro¬ 
gram,  each  line  being  assigned  a  number  one  integer  greater  than  its 
predecessor.  Internal  statement  numbers,  appearing  on  the  right-hand 
side  of  each  listing,  begin  with  unit  for  each  routine  within  a  program. 
Unlike  line  numbers,  internal  statement  numbers  index  FORTRAN  statements. 
Thus,  there  are  no  internal  statement  numbers  assigned  to  comment  lines, 
and  just  one  integer  assigned  to  multiline  FORTRAN  statements. 
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APPENDIX  B:  MERGED  VARIABLE  CROSS-REFERENCE  LISTING 

This  appendix  contains  a  merged  variable  cross-reference  listing  for 
all  of  the  programs  which  make  up  the  TOS  Simulation  Package.  These 
programs  are  CREATE,  DISPLAY,  MODIFY,  and  COMPUTE.  The  merged  cross- 
reference  lists  all  the  occurrences  of  each  variable  in  the  programs 
which  make  up  the  TOS  Simulation  Package. 

Referencing  of  statements  that  a  variable  is  used  in  is  done  using 
internal  statement  numbers  (see  the  discussion  of  internal  statement 
numbers  in  the  previous  description  of  appendix  A.)  Since  internal 
statements  are  numbered  beginning  at  one  within  each  routine,  each 
reference  to  internal  statement  numbers  also  requires  specification  of 
the  routine  in  which  the  statement  is  located.  This  is  accomplished  by 
first  listing  the  variable  being  cross-referenced,  then  the  routine  in 
which  occurrences  of  this  variable  appear,  and  to  the  far  right,  a  list 
of  internal  statement  numbers  referring  to  statements  in  this  program 
module  at  which  the  variable  Is  referenced.  If  the  variable  is 
referenced  multiple  times  within  a  single  statement,  only  one  reference 
appears  in  the  cross-reference  listing.  Some  Internal  statement 
references  in  the  listing  may  be  Immediately  followed  fcy  a  symbol 
Indicating  the  usage  of  the  variable  In  this  statement.  The  following 
key  defines  the  usage  of  these  symbols: 

*  A  variable  or  a  function  Is  changed  either  through  an  assignment 
READ,  ASSIGN  statement,  or  Is  used  as  a  DO  index. 

?  A  variable  may  be  changed  because  it  Is  used  as  a  simple  argument 
to  a  subroutine  or  function. 

D  A  subprogram  Is  defined  by  the  SUBROUTINE,  FUNCTION,  ENTRY,  or 
EXTERNAL  statement.  A  statement  function  is  defined  by  the 
statement  function  definition.  A  variable  is  declared  in  a 


type  or  DIMENSION  statement.  For  units,  "D"  stands  for  DEFINE 
FILE  statements. 


E  A  variable  appears  in  an  EQUIVALENCE  statement. 

C  A  variable  appears  in  a  COMMON  statement. 

These  suffixes  are  especially  useful  since  they  allow  distinguishing 
the  use  of  variables  in  declarations  from  their  use  in  executable 
statements,  and,  in  the  latter  case,  the  distinguishing  between  just  the 
referencing  of  a  variable  versus  its  updating.  These  distinctions  can  be 
made,  for  the  most  part,  just  from  the  suffixes,  without  the  need  for 
looking  up  the  statement  in  the  program  listing. 

Certain  other  useful  pieces  of  information  are  also  provided  in 
these  cross-reference  listings.  The  type  of  each  variable  is  indicated. 
The  list  of  variable  types  included  are  "1*4"  for  integer  variables, 

"R*4"  for  real  variables,  "L*4"  for  logical  variables,  and  “CHAR"  for 
character  variables.  The  field  in  the  cross-reference  listing  with  the 
heading  "ATTR"  distinguishes  between  scalars  and  arrays.  This  field  is 
left  blank  for  scalars  while  it  contains  "ARRAY"  for  arrays.  It  has  been 
found  useful  to  include  references  to  subroutines  and  functions  in  these 
cross-reference  listings,  in  addition  to  references  to  just  variables. 
These  are  distinguished  from  variables  by  having  "SUBR"  or  "FCN"  in  the 
ATTR  field.  Another  type  of  Item  Included  in  these  cross-references  are 
RETURN  or  STOP  statements  within  each  program  module.  These  are 
referenced  in  the  listing  using  <EXIT>  as  the  name  of  the  "variable". 
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APPENDIX  C:  STATEMENT  LABEL  REFERENCES 

This  Appendix  presents  statement  label  reference  listings  for  each 
program  in  the  analysis  package.  The  statement  labels  are  expressed  in 
terms  of  Internal  statement  numbers.  The  program  listings  in  Appendix  A 
can  be  consulted  to  look  up  any  referenced  statement.  Within  each 
program  module,  for  each  FORTRAN  statement  label  which  appears,  four 
types  of  information  are  provided  in  the  label  reference  listing:  the 
label  being  referenced;  the  internal  statement  number  where  it  is  defined 
(i.e.,  the  statement  in  which  it  is  a  label);  a  type  indicator  ( "FMT"  if 
it  refers  to  a  format  statement,  and  blank  otherwise);  and  a  list  of 
statement  in  the  routine  in  which  this  statement  label  is  referenced. 
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